home *** CD-ROM | disk | FTP | other *** search
/ CU Amiga Super CD-ROM 2 / CU Amiga Magazine's Super CD-ROM 02 (1996)(EMAP Images)(GB)[!][issue 1996-04].iso / magazine / amiga_e / e_v3.2a_extras / pdsrc / oomodules / reqtools_test.e < prev    next >
Text File  |  1995-02-09  |  571b  |  27 lines
  1. MODULE 'oomodules/reqtools','libraries/reqtools'
  2.  
  3.  
  4. PROC main()
  5. DEF req:PTR TO reqtools
  6.  
  7.   NEW req.new()
  8.  
  9. /*  req.ez('Nice to see ya!','Ah.|So what?',0,0,[RTEZ_REQTITLE,'Just a test',RT_REQPOS,REQPOS_POINTER])
  10.   req.string('Just enter a string:')
  11.   WriteF('\s\n',req.stringbuf)
  12.   req.string('Just enter a string:')
  13.   WriteF('\s\n',req.stringbuf)
  14.  
  15.   req.long('just enter a number:')
  16.   WriteF('\d\n', req.number)
  17.  
  18.   req.palette('just choose a colour:')
  19.   WriteF('\d\n', req.number)
  20. */
  21.  
  22.   req.file('FILE?')
  23.   WriteF('\s\n', req.filebuf)
  24.   WriteF('\s\n', req.dirbuf)
  25.  
  26. ENDPROC
  27.